home *** CD-ROM | disk | FTP | other *** search
/ Megahits 3 / Megahits 3 (1994)(GTI - Rhein-Main-Soft)(DE)[!].iso / transfer / catalogue.dms / catalogue.adf / demo.AMOS / demo.amosSourceCode < prev    next >
AMOS Source Code  |  1978-01-04  |  251b  |  14 lines
  1. Screen Open 0,320,256,16,L
  2. Unpack 1 To 0
  3. Curs Off : Flash Off : Hide 
  4. Shift Down 2,2,7,1
  5. Do 
  6.    If Key State($50)
  7.       Screen Close 0
  8.       Run "tank3_c.amos"
  9.    End If 
  10.    If Key State($51)
  11.       Screen Close 0
  12.       Run "instr.amos"
  13.    End If 
  14. Loop